       01 FILE-STATUS. 
         03 STATUS-KEY-1                                PIC X. 
         03 STATUS-KEY-2                                PIC X. 
         03 BINARY-STATUS REDEFINES STATUS-KEY-2        PIC 99 COMP-X.